(mark-ring): Add permanent-local prop. Doc fix.

diff --git a/lisp/simple.el b/lisp/simple.el
index 1725dd6585b30be228692ea5c7ce5bb9b9e6623f..c26690c9ca325d3c8e2afcd3ead79ab9a35904b0 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -1343,9 +1343,9 @@ store it in a Lisp variable.  Example:
     (set-marker (mark-marker) nil)))
 
 (defvar mark-ring nil
-  "The list of saved former marks of the current buffer,
-most recent first.")
+  "The list of former marks of the current buffer, most recent first.")
 (make-variable-buffer-local 'mark-ring)
+(put 'mark-ring 'permanent-local t)
 
 (defconst mark-ring-max 16
   "*Maximum size of mark ring.  Start discarding off end if gets this big.")